0 SYS65409:SYS65412:SYS65418:POKE53280,9:POKE53281,9
1 PRINT"[147]":XM=20:YM=12:HR=10:VR=HR:SP=6.5:GOSUB20
2 POKE211,16:POKE214,10:SYS58640
3 PRINT"TIGER-CREW"
4 POKE211,15:POKE214,13:SYS58640:PRINT"BASIC POWER!
9 [129]I[178]5000[164]1[169][171]50:[153]""I[173]1000:[130]:[137]100
10 [153]"LOAD"
11 XM[178]20:YM[178]12:HR[178]10:VR[178]10:SP[178]4
20 [153]"LOAD":PI[178]3.14
22 W1[178].:W2[178]45:W3[178]90:W4[178]135:W5[178]180:W6[178]225:W7[178]270:W8[178]315
30 WA[178]W1[172]PI[173]180:WB[178]W2[172]PI[173]180:WC[178]W3[172]PI[173]180:WD[178]W4[172]PI[173]180
31 WE[178]W5[172]PI[173]180:WF[178]W6[172]PI[173]180:WG[178]W7[172]PI[173]180:WH[178]W8[172]PI[173]180
40 X1[178][181](XM[170]HR[172][190](WA)[170].5):Y1[178][181](YM[170]VR[172][191](WA)[170].5):[151]1024[170]Y1[172]40[170]X1,160
41 X2[178][181](XM[170]HR[172][190](WB)[170].5):Y2[178][181](YM[170]VR[172][191](WB)[170].5):[151]1024[170]Y2[172]40[170]X2,160
42 X3[178][181](XM[170]HR[172][190](WC)[170].5):Y3[178][181](YM[170]VR[172][191](WC)[170].5):[151]1024[170]Y3[172]40[170]X3,160
44 X4[178][181](XM[170]HR[172][190](WD)[170].5):Y4[178][181](YM[170]VR[172][191](WD)[170].5):[151]1024[170]Y4[172]40[170]X4,160
45 X5[178][181](XM[170]HR[172][190](WE)[170].5):Y5[178][181](YM[170]VR[172][191](WE)[170].5):[151]1024[170]Y5[172]40[170]X5,160
46 X6[178][181](XM[170]HR[172][190](WF)[170].5):Y6[178][181](YM[170]VR[172][191](WF)[170].5):[151]1024[170]Y6[172]40[170]X6,160
47 X7[178][181](XM[170]HR[172][190](WG)[170].5):Y7[178][181](YM[170]VR[172][191](WG)[170].5):[151]1024[170]Y7[172]40[170]X7,160
48 X8[178][181](XM[170]HR[172][190](WH)[170].5):Y8[178][181](YM[170]VR[172][191](WH)[170].5):[151]1024[170]Y8[172]40[170]X8,160
80 W1[178]W1[170]SP:W2[178]W2[170]SP:W3[178]W3[170]SP:W4[178]W4[170]SP:W5[178]W5[170]SP:W6[178]W6[170]SP:W7[178]W7[170]SP:W8[178]W8[170]SP
81 [139]W1[179]45[167]30
90 [142]
100 [151]53280,9:[151]53281,9
102 [153]"LOADKREISE ZEICHNEN IN BASIC <<<<<<<<<<<<<<
103 PRINT"CIRCLE PAINTER V1.0 <<<<<<<<<<<<<<<<<<<
104 [153]"WRITTEN IN FEB. 1995 BY MADROM/TC/CREAM
105 PRINT"---------------------------------------
106 [153]"SCHNELL, SCHNELLER, AM SCHNELLSTEN ...
110 INPUT"MITTELPUNKT (X-KOORD.):";XM
120 INPUT"MITTELPUNKT (Y-KOORD.):";YM
130 INPUT"HORIZONTALER RADIUS:";HR
140 INPUT"VERTIKALER RADIUS:";VR
150 PRINT"SPEED (1=SEHR LANGSAM ABER GENAU)
160 [153]"      (8=SEHR SCHNELL ABER UNGENAU)
170 INPUT"SPEED (1-8):";SP
190 GOSUB20
200 PRINT"";:SYS42115